home *** CD-ROM | disk | FTP | other *** search
/ Best of www.BestZips.com (Collector's Edition) / Best of WWW.BESTZIPS.COM Collector's Edition (JCSM Shareware) (JCS Marketing).ISO / prgtools / prtsut53.zip / SU1SRC.ZIP / UNITMAIN.DFM / UNITMAIN.txt
Text File  |  1997-02-02  |  4KB  |  161 lines
  1. object MainDialog: TMainDialog
  2.   Left = 267
  3.   Top = 212
  4.   BorderStyle = bsDialog
  5.   Caption = 'Main Dialog'
  6.   ClientHeight = 382
  7.   ClientWidth = 592
  8.   Font.Color = clBlack
  9.   Font.Height = -14
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = [fsBold]
  12.   PixelsPerInch = 120
  13.   Position = poScreenCenter
  14.   TextHeight = 16
  15.   object Bevel1: TBevel
  16.     Left = 9
  17.     Top = 0
  18.     Width = 581
  19.     Height = 70
  20.     Style = bsRaised
  21.   end
  22.   object Label1: TLabel
  23.     Left = 169
  24.     Top = 9
  25.     Width = 410
  26.     Height = 51
  27.     Caption = 
  28.       'These demos display some of Printit'#39's unique printing abilities.' +
  29.       ' They were specifically created out of user demand to answer que' +
  30.       'stions on Printit and show the more advanced topics'
  31.     Font.Color = clPurple
  32.     Font.Height = -15
  33.     Font.Name = 'Times New Roman'
  34.     Font.Style = [fsBold]
  35.     ParentFont = False
  36.     WordWrap = True
  37.   end
  38.   object Printit: TLabel
  39.     Left = 25
  40.     Top = 9
  41.     Width = 87
  42.     Height = 38
  43.     Caption = 'Printit'
  44.     Font.Color = clYellow
  45.     Font.Height = -33
  46.     Font.Name = 'Times New Roman'
  47.     Font.Style = [fsBold, fsItalic]
  48.     ParentFont = False
  49.   end
  50.   object Panel1: TPanel
  51.     Left = 12
  52.     Top = 76
  53.     Width = 485
  54.     Height = 297
  55.     TabOrder = 0
  56.     object Label3: TLabel
  57.       Left = 12
  58.       Top = 9
  59.       Width = 461
  60.       Height = 48
  61.       Alignment = taCenter
  62.       Caption = 
  63.         'The source for each demo is in the form # printed next to them e' +
  64.         '.g. Demo 01 is in unit FDemo01, Demo 10 is in unit FDemo10'
  65.       Font.Color = clBlue
  66.       Font.Height = -15
  67.       Font.Name = 'Arial'
  68.       Font.Style = [fsBold]
  69.       ParentFont = False
  70.       WordWrap = True
  71.     end
  72.     object ListBox1: TListBox
  73.       Left = 12
  74.       Top = 56
  75.       Width = 461
  76.       Height = 230
  77.       Font.Color = clBlack
  78.       Font.Height = -15
  79.       Font.Name = 'Arial'
  80.       Font.Style = []
  81.       ItemHeight = 17
  82.       Items.Strings = (
  83.         
  84.           '01 Actual Font Styles and Sizes - As supplied by the Printer Dri' +
  85.           'ver '
  86.         '02 Multiple TPanel components - Combined size larger than page'
  87.         '03 Printing the Active Page on a TNotebook'
  88.         '04 Print a Window'
  89.         '05 Print Invoice #1 - View or direct to printer'
  90.         '06 Print a form with Fishes from a Table'
  91.         '07 Combined Window and Grid Print '
  92.         '08 Grid Print'
  93.         
  94.           '09 Grid and Window on same page - View and Direct Print to print' +
  95.           'er'
  96.         '10 Print current Printer Information'
  97.         '11 Print Fonts of currently selected printer'
  98.         '12 Simple Pie Chart'
  99.         '13 Print a few shapes'
  100.         '14 A Fax Form example'
  101.         '15 Various components printed'
  102.         '16 Print Grid backdrops'
  103.         '17 Print Invoice # 2'
  104.         '18 Print a customised letter'
  105.         '19 RadioButtons, GroupBoxes, CheckBoxes etc.'
  106.         '20 Print a customised chain letter'
  107.         ''
  108.         '')
  109.       ParentFont = False
  110.       TabOrder = 0
  111.       OnDblClick = ListBox1DblClick
  112.     end
  113.   end
  114.   object View: TButton
  115.     Left = 505
  116.     Top = 121
  117.     Width = 85
  118.     Height = 32
  119.     Caption = '&View'
  120.     Font.Color = clBlack
  121.     Font.Height = -15
  122.     Font.Name = 'Arial'
  123.     Font.Style = []
  124.     ParentFont = False
  125.     TabOrder = 2
  126.     OnClick = ViewClick
  127.   end
  128.   object Exit: TButton
  129.     Left = 503
  130.     Top = 260
  131.     Width = 87
  132.     Height = 33
  133.     Caption = '&Exit'
  134.     Font.Color = clBlack
  135.     Font.Height = -15
  136.     Font.Name = 'Arial'
  137.     Font.Style = []
  138.     ParentFont = False
  139.     TabOrder = 3
  140.     OnClick = ExitClick
  141.   end
  142.   object Printer: TButton
  143.     Left = 505
  144.     Top = 76
  145.     Width = 85
  146.     Height = 34
  147.     Caption = 'Set &Printer'
  148.     Font.Color = clBlack
  149.     Font.Height = -15
  150.     Font.Name = 'Arial'
  151.     Font.Style = []
  152.     ParentFont = False
  153.     TabOrder = 1
  154.     OnClick = PrinterClick
  155.   end
  156.   object PrinterSetupDialog1: TPrinterSetupDialog
  157.     Left = 528
  158.     Top = 320
  159.   end
  160. end
  161.